home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / ASP / ASPapp Portal / aa_menu.asp < prev    next >
Encoding:
Text File  |  2002-03-12  |  401 b   |  33 lines
  1. <%
  2. %>
  3. <%
  4.  
  5.  
  6.  
  7.  
  8.  
  9. do_search = request("do_search")
  10. ''' request form keys
  11. ''' request action
  12. action = lcase(request("action"))
  13. ''' action case handler
  14. select case action
  15.  
  16. end select
  17.  
  18. '  no action was specified, so handle the default case(s)
  19.  
  20. %>
  21.  
  22.  
  23. <table class='menuTable' >
  24. <tr>
  25.     <td class='menuTD' >
  26.         <a class=menuFont href="default.asp">HOME</a>
  27.     </td>
  28. </tr>
  29.  
  30. </table>
  31.  
  32.  
  33.